home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
windows
/
diskfree.zip
/
DiskFree.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1997-05-19
|
6KB
|
224 lines
object Form1: TForm1
Left = 302
Top = 96
BorderIcons = []
BorderStyle = bsNone
Caption = 'DiskFree 1.0'
ClientHeight = 297
ClientWidth = 265
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
PopupMenu = PopupMenu1
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 265
Height = 297
BevelInner = bvRaised
TabOrder = 0
object Panel3: TPanel
Left = 8
Top = 8
Width = 249
Height = 49
TabOrder = 0
object Label6: TLabel
Left = 48
Top = 6
Width = 73
Height = 13
Caption = 'DiskFree 1.0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Image1: TImage
Left = 8
Top = 6
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image000.ico>}
Stretch = True
end
object Memo1: TMemo
Left = 48
Top = 20
Width = 193
Height = 27
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 0
end
end
object Panel2: TPanel
Left = 8
Top = 64
Width = 249
Height = 225
TabOrder = 1
object Label1: TLabel
Left = 176
Top = 8
Width = 62
Height = 16
Caption = 'Pop-up!'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGray
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object Label4: TLabel
Left = 8
Top = 8
Width = 112
Height = 23
Caption = 'Drive Statistics'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -19
Font.Name = 'Arial Narrow'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 8
Top = 139
Width = 121
Height = 13
Caption = 'Summary for total drives...'
end
object Label2: TLabel
Left = 174
Top = 6
Width = 62
Height = 16
Caption = 'Pop-up!'
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
ParentFont = False
Transparent = True
end
object Panel4: TPanel
Left = 8
Top = 152
Width = 233
Height = 25
Hint = 'Summary, available in Registered version only!'
BevelOuter = bvLowered
Color = clWindow
ParentShowHint = False
ShowHint = True
TabOrder = 2
object lblTotals: TLabel
Left = 8
Top = 6
Width = 222
Height = 13
AutoSize = False
end
end
object RadioButton1: TRadioButton
Left = 8
Top = 184
Width = 58
Height = 18
Caption = '&MBytes'
Checked = True
TabOrder = 3
TabStop = True
OnClick = FormShow
end
object RadioButton2: TRadioButton
Left = 8
Top = 200
Width = 58
Height = 18
Caption = '&KBytes'
TabOrder = 4
OnClick = FormShow
end
object BitBtn2: TBitBtn
Left = 88
Top = 191
Width = 74
Height = 26
Caption = '&Refresh'
TabOrder = 1
OnClick = FormShow
Kind = bkRetry
end
object bbtnOK: TBitBtn
Left = 167
Top = 191
Width = 74
Height = 26
Cancel = True
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 0
OnClick = AppDeactivate
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object ListBox1: TListBox
Left = 8
Top = 32
Width = 233
Height = 105
ItemHeight = 17
Style = lbOwnerDrawVariable
TabOrder = 5
end
end
end
object PopupMenu1: TPopupMenu
Left = 232
object AboutDiskFree: TMenuItem
Caption = 'About '#39'DiskFree'#39
OnClick = AboutDiskFreeClick
end
object Exit1: TMenuItem
Caption = 'Exit '#39'DiskFree'#39
OnClick = Exit1Click
end
end
end